write a progarm